(use-modules (gschem selection)) (define (add-selected-attribs-number! number) (for-each (lambda (object) (and (attribute? object) (set-attrib-value! object (number->string (+ (string->number (attrib-value object)) number))))) (page-selection (active-page))))